inherited frmCancelBill: TfrmCancelBill
  Left = 454
  Top = 147
  Caption = #24448#26469#24080#26680#38144
  OnKeyDown = nil
  PixelsPerInch = 96
  TextHeight = 12
  inherited pnlDBCtrl: TPanel
    inherited pnlThirdtrade: TPanel
      inherited lblTTtraderid: TcxLabel
        AnchorX = 78
      end
      inherited cxLabel1: TcxLabel
        Left = 216
        ExplicitLeft = 216
        AnchorX = 244
      end
      inherited lblTTBalanceid: TcxLabel
        Left = 381
        ExplicitLeft = 381
        AnchorX = 433
      end
    end
    inherited lblName: TcxLabel
      Left = 22
      Caption = #24448#26469#24080#26680#38144
      Style.IsFontAssigned = True
      ExplicitLeft = 22
      ExplicitWidth = 129
    end
    inherited DtlPageCtrl: TcxPageControl
      inherited tabMain: TcxTabSheet
        inherited DtlGrid: TcxGrid
          Height = 232
          ExplicitHeight = 232
        end
        object DtlGrid2: TcxGrid
          Left = 0
          Top = 240
          Width = 872
          Height = 101
          Align = alBottom
          PopupMenu = pmDetail2
          TabOrder = 2
          Visible = False
          object DtlGrid2View: TcxGridDBBandedTableView
            PopupMenu = pmDetail2
            OnDblClick = DtlGrid2ViewDblClick
            OnKeyDown = DtlGrid2ViewKeyDown
            Navigator.Buttons.CustomButtons = <>
            OnCustomDrawCell = DtlGridDBTableViewCustomDrawCell
            OnFocusedItemChanged = DtlGrid2ViewFocusedItemChanged
            OnFocusedRecordChanged = DtlGrid2ViewFocusedRecordChanged
            DataController.DataSource = dsDetail2
            DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <>
            OptionsBehavior.FocusCellOnTab = True
            OptionsBehavior.FocusFirstCellOnNewRecord = True
            OptionsBehavior.GoToNextCellOnEnter = True
            OptionsBehavior.FocusCellOnCycle = True
            OptionsCustomize.ColumnHiding = True
            OptionsData.CancelOnExit = False
            OptionsData.Inserting = False
            OptionsSelection.MultiSelect = True
            OptionsView.ShowEditButtons = gsebForFocusedRecord
            OptionsView.ColumnAutoWidth = True
            OptionsView.Footer = True
            OptionsView.FooterMultiSummaries = True
            OptionsView.GroupByBox = False
            OptionsView.GroupFooterMultiSummaries = True
            OptionsView.GroupFooters = gfAlwaysVisible
            OptionsView.HeaderHeight = 35
            OptionsView.Indicator = True
            OptionsView.IndicatorWidth = 25
            OptionsView.BandHeaders = False
            OptionsView.FixedBandSeparatorColor = clBackground
            OptionsView.FixedBandSeparatorWidth = 3
            Preview.MaxLineCount = 0
            Preview.Visible = True
            Styles.Background = bsBackGroup
            Styles.ContentEven = bsEven
            Styles.ContentOdd = bsOdd
            Styles.Footer = bsTitle
            Styles.Header = bsTitle
            Styles.Indicator = bsTitle
            Styles.Selection = bsSelect
            Styles.BandBackground = bsBackGroup
            Styles.BandHeader = bsTitle
            OnCustomDrawColumnHeader = DtlGrid2ViewCustomDrawColumnHeader
            OnLeftPosChanged = DtlGrid2ViewLeftPosChanged
            Bands = <
              item
                FixedKind = fkLeft
                Width = 115
              end
              item
              end>
          end
          object DtlGrid2Level: TcxGridLevel
            GridView = DtlGrid2View
          end
        end
        object cxSplitter1: TcxSplitter
          Left = 0
          Top = 232
          Width = 872
          Height = 8
          Cursor = crVSplit
          HotZoneClassName = 'TcxXPTaskBarStyle'
          AlignSplitter = salBottom
          DragThreshold = 8
          AutoSnap = True
          Control = DtlGrid2
          Color = clSilver
          ParentColor = False
          Visible = False
        end
      end
    end
    inherited imgCheck: TcxImage
      Left = 124
      TabOrder = 6
      ExplicitLeft = 124
      ExplicitWidth = 154
      Width = 154
    end
    inherited lblPrinted: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited dynlblCreate_by: TcxLabel
      AnchorX = 221
    end
    inherited dynlblCheck_by: TcxLabel
      AnchorX = 429
    end
    inherited dynlblFilid: TcxLabel
      AnchorX = 88
    end
    inherited dynlblDeptid: TcxLabel
      AnchorX = 301
    end
    inherited dynlblEmpid: TcxLabel
      AnchorX = 505
    end
    inherited dynlblBKind: TcxLabel
      AnchorX = 149
    end
  end
  inherited Panel1: TPanel
    inherited labFuncName: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited labFuncDesc: TcxLabel
      Style.IsFontAssigned = True
    end
  end
  inherited pnlTop: TPanel
    inherited btnPrint: TcxButton
      OnClick = mnuPrintClick
    end
  end
  inherited pnlBottom: TPanel
    inherited btnDelete: TcxButton
      TabOrder = 9
    end
    object btnAutoCancel: TcxButton
      Left = 335
      Top = 17
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = #33258#21160#26680#38144
      Colors.Default = 16773345
      TabOrder = 5
      OnClick = muAutoCancelClick
    end
  end
  inherited MainDataSource: TDataSource
    Left = 213
    Top = 181
  end
  inherited MainMenu1: TMainMenu
    inherited mnuEdit: TMenuItem
      inherited mnuModifyRecord: TMenuItem
        OnClick = nil
      end
      inherited mnuDeleteRecord: TMenuItem
        OnClick = nil
      end
    end
    inherited mnuView: TMenuItem
      inherited mnuQueryRecords: TMenuItem
        OnClick = nil
      end
      inherited mnuLocateRecord: TMenuItem
        OnClick = nil
      end
      inherited mnuPrint: TMenuItem
        OnClick = nil
      end
      inherited mnuPrintPreview: TMenuItem
        OnClick = nil
      end
      inherited mnuOutPutData: TMenuItem
        OnClick = nil
      end
    end
  end
  inherited ActionList1: TActionList
    inherited actPrint: TAction
      OnExecute = nil
    end
    inherited actPrintView: TAction
      OnExecute = nil
    end
    inherited actExport: TAction
      OnExecute = nil
    end
  end
  inherited PopupMenu1: TPopupMenu
    inherited muCopy: TMenuItem
      Visible = False
    end
    inherited pmuRuleExplain: TMenuItem
      OnClick = nil
    end
  end
  inherited pmExec: TPopupMenu
    object muAutoCancel: TMenuItem [4]
      Caption = #33258#21160#26680#38144
      OnClick = muAutoCancelClick
    end
    object N9: TMenuItem [5]
      Caption = '-'
    end
  end
  inherited dsDetail: TDataSource
    Left = 424
    Top = 241
  end
  inherited pmDetail: TPopupMenu
    inherited muDtlInsert: TMenuItem
      Visible = False
    end
  end
  inherited cxStyleRepository1: TcxStyleRepository
    PixelsPerInch = 96
  end
  inherited cdsMaster: TClientDataSet
    Left = 144
    Top = 180
  end
  inherited dspMaster: TDataSetProvider
    Left = 92
  end
  inherited dspDetail: TDataSetProvider
    Left = 304
    Top = 241
  end
  inherited cdsDetail: TClientDataSet
    Left = 364
    Top = 241
  end
  inherited qryDetail: TUniQuery
    SQL.Strings = (
      'select d.*, v.bcode, v.BNAME,v.BDATE, v.BKIND, v.BAMOUNT,'
      'v.brelationamt, v.bneedbalamt, v.brptag, d.amount as oldamount, '
      'balnow=cast(case when amount<>0 then 1 else 0 end as bit),'
      '0 as baledamt,0 as needbalamt '
      'from tb_canceldtl d '
      
        'left join v_cancelbill v on (d.Relationbtype=v.BType and d.Relat' +
        'ionbid=v.bid)  '
      'where d.dtlkind=0 and d.bid=-99 order by d.bno')
    Left = 252
    Top = 236
  end
  object qryDetail2: TUniQuery
    Connection = MainDM.UniConn
    CachedUpdates = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Left = 244
    Top = 356
  end
  object dspDetail2: TDataSetProvider
    DataSet = qryDetail2
    UpdateMode = upWhereKeyOnly
    BeforeUpdateRecord = dspDetail2BeforeUpdateRecord
    Left = 296
    Top = 357
  end
  object cdsDetail2: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspDetail2'
    Left = 356
    Top = 357
  end
  object dsDetail2: TDataSource
    DataSet = cdsDetail2
    Left = 416
    Top = 357
  end
  object pmDetail2: TPopupMenu
    Left = 500
    Top = 333
    object muDtl2New: TMenuItem
      Caption = #26032#22686#26126#32454
      OnClick = muDtl2NewClick
    end
    object muDtl2Delete: TMenuItem
      Caption = #21024#38500#26126#32454
      OnClick = muDtl2DeleteClick
    end
    object N10: TMenuItem
      Caption = '-'
    end
    object muRelationDtl2Bill: TMenuItem
      Caption = #26597#30475#34987#24341#29992#21333#25454
      OnClick = muRelationDtl2BillClick
    end
  end
end
